home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 November: Tool Chest / Dev.CD Nov 00 TC Disk 1.toast / Sample Code / Graphics 3D / SetupGL / SetupGL Main Windowed.c < prev    next >
Encoding:
Text File  |  2000-09-28  |  18.2 KB  |  599 lines  |  [TEXT/CWIE]
  1. /*
  2.     File:        SetupGL Main Windowed.c
  3.  
  4.     Contains:    An example of the use of the SeupGL utility code for windowed applications.
  5.  
  6.     Written by:    Geoff Stahl
  7.  
  8.     Copyright:    2000 Apple Computer, Inc., All Rights Reserved
  9.  
  10.     Change History (most recent first):
  11.  
  12.  
  13.     Disclaimer:    IMPORTANT:  This Apple software is supplied to you by Apple Computer, Inc.
  14.                 ("Apple") in consideration of your agreement to the following terms, and your
  15.                 use, installation, modification or redistribution of this Apple software
  16.                 constitutes acceptance of these terms.  If you do not agree with these terms,
  17.                 please do not use, install, modify or redistribute this Apple software.
  18.  
  19.                 In consideration of your agreement to abide by the following terms, and subject
  20.                 to these terms, Apple grants you a personal, non-exclusive license, under Apple’s
  21.                 copyrights in this original Apple software (the "Apple Software"), to use,
  22.                 reproduce, modify and redistribute the Apple Software, with or without
  23.                 modifications, in source and/or binary forms; provided that if you redistribute
  24.                 the Apple Software in its entirety and without modifications, you must retain
  25.                 this notice and the following text and disclaimers in all such redistributions of
  26.                 the Apple Software.  Neither the name, trademarks, service marks or logos of
  27.                 Apple Computer, Inc. may be used to endorse or promote products derived from the
  28.                 Apple Software without specific prior written permission from Apple.  Except as
  29.                 expressly stated in this notice, no other rights or licenses, express or implied,
  30.                 are granted by Apple herein, including but not limited to any patent rights that
  31.                 may be infringed by your derivative works or by other works in which the Apple
  32.                 Software may be incorporated.
  33.  
  34.                 The Apple Software is provided by Apple on an "AS IS" basis.  APPLE MAKES NO
  35.                 WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED
  36.                 WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  37.                 PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN
  38.                 COMBINATION WITH YOUR PRODUCTS.
  39.  
  40.                 IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR
  41.                 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  42.                 GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  43.                 ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION
  44.                 OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT
  45.                 (INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN
  46.                 ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  47.     
  48.          <1>     3/22/00    ggs     New windowed demo code
  49.         <6+>     2/24/00    ggs        Windowed mode support 
  50.          <6>     1/26/00    ggs     Add preflight support, handle failure conditions throughout app
  51.                                     better
  52.          <5>     1/24/00    ggs     fixed Apple menu selection, fixed aglfont texture row length
  53.                                     problem, fixed suspend/resume, fixed update
  54.          <4>    12/18/99    ggs     Fix headers
  55.          <3>    12/18/99    ggs     Added window/fullscreen toggle support and error window
  56.          <2>    11/28/99    ggs     Standard toolbox application
  57.          <1>    11/28/99    ggs     Initial Add
  58.          <6>     9/14/99    GGS        Corrected buffer rect handling and cleaned up code
  59.          <5>     7/14/99    GGS        Fixed multi-monitor window centering
  60.          <4>     7/13/99    GGS        Add work around for over zealous checking in single buffer DSp context attributes
  61.          <3>     7/5/99     GGS        Now correctly handle multi-monitor (DSp front buffer for single device; Window on top of context for multiple devices)
  62.          <2>     5/28/99    GGS     Added better multi-monitor support, clean code, corrected blanking bug, added timing, correct pixel formats
  63.          <1>        ?        ?      Initial build
  64. */
  65.  
  66.  
  67. // system includes ----------------------------------------------------------
  68.  
  69. #include <Devices.h>
  70. #include <Dialogs.h>
  71. #include <DriverServices.h>
  72. #include <Events.h>
  73. #include <LowMem.h>
  74. #include <TextEdit.h>
  75. #include <ToolUtils.h>
  76. #include <Windows.h>
  77.  
  78. #include <math.h>
  79. #include <stdio.h>
  80. #include <string.h>
  81.  
  82. #include <gl.h>
  83.  
  84. // project includes ---------------------------------------------------------
  85.  
  86. #include "SetupGL.h"
  87.  
  88. // prototypes ---------------------------------------------------------------
  89.  
  90. void InitToolbox(void);
  91. Boolean SetUp (void);
  92. void DoMenu (SInt32 menuResult);
  93. void DoKey (SInt8 theKey, SInt8 theCode);
  94. void DoUpdate (WindowPtr pWindow);
  95. void DoEvent (void);
  96. void CleanUp (void);
  97.  
  98. void drawGL(WindowPtr pWindow, AGLContext aglContext, GLuint fontList);
  99.  
  100. void DrawFrameRate (GLuint fontList);
  101. void DrawContextInfo (GLuint fontList);
  102.  
  103. void DrawPStringGL (Str255 pstrOut, GLuint fontList);
  104. void DrawCStringGL (char * cstrOut, GLuint fontList);
  105. GLuint BuildFontGL (AGLContext ctx, GLint fontID, Style face, GLint size);
  106. void DeleteFontGL (GLuint fontList);
  107.  
  108.  
  109. // statics/globals (internal only) ------------------------------------------
  110.  
  111. // Menu defs
  112. enum 
  113. {
  114.     kNumRes = 10,
  115.     kNumFreqs = 11,
  116.  
  117.     kMenuApple = 128,
  118.     kMenuFile = 129,
  119.     
  120.     kAppleAbout = 1,
  121.     kFileQuit = 1
  122. };
  123.  
  124. enum 
  125. {
  126.     kForegroundSleep = 0,
  127.     kBackgroundSleep = 10
  128. };
  129.  
  130. const RGBColor    rgbWhite    = { 0xFFFF, 0xFFFF, 0xFFFF };
  131.  
  132. SInt32 gSleepTime = kForegroundSleep;
  133. Boolean gDone = false, gfFrontProcess = true;
  134.  
  135. char gstrContext1 [256] = ""; // mode strings
  136. char gstrContext2 [256] = "";
  137.  
  138. structGLWindowInfo glInfo1, glInfo2;
  139. AGLContext aglContext1 = 0, aglContext2 = 0;
  140. GLuint gFontList1 = 0, gFontList2 = 0;
  141.  
  142. WindowPtr gpWindow1 = NULL, gpWindow2 = NULL;
  143.  
  144.  
  145. // functions (internal/private) ---------------------------------------------
  146.  
  147. void InitToolbox(void)
  148. {
  149.     MenuHandle menu;
  150.  
  151.     MaxApplZone ();
  152.  
  153.     InitGraf((Ptr) &qd.thePort);
  154.     InitFonts();
  155.     InitWindows();
  156.     InitMenus();
  157.     TEInit();
  158.     InitDialogs(nil);
  159.     InitCursor();
  160.     
  161.     qd.randSeed =  TickCount();
  162.  
  163.     // Init Menus
  164.     menu = NewMenu (kMenuApple, "\p\024");            // new  apple menu
  165.     InsertMenu (menu, 0);                            // add menu to end
  166.     AppendResMenu(menu, 'DRVR');
  167.     
  168.     menu = NewMenu (kMenuFile, "\pFile");            // new menu
  169.     InsertMenu (menu, 0);                            // add menu to end
  170.     AppendMenu (menu, "\pQuit/Q");                     // add items
  171.     
  172.     DrawMenuBar();
  173. } 
  174.  
  175. // --------------------------------------------------------------------------
  176.  
  177. Boolean SetUp (void)
  178. {
  179.     short i;
  180.     short fNum;
  181.  
  182.     InitToolbox ();
  183.     
  184.     if (PreflightGL (false))
  185.     {
  186.         Rect rectWin1 = {100, 100, 500, 500},  rectWin2 = {300, 350, 600, 650};
  187.         
  188.         memset(&glInfo1, 0, sizeof glInfo1);
  189.         glInfo1.fAcceleratedMust = true;     // must renderer be accelerated?
  190.         glInfo1.VRAM = 0 * 1048576;            // minimum VRAM (if not zero this is always required)
  191.         glInfo1.textureRAM = 0 * 1048576;    // minimum texture RAM (if not zero this is always required)
  192.         glInfo1.fDraggable = false;         // desired vertical refresh frquency in Hz (0 = any)
  193.         glInfo1.fmt = 0;                    // output pixel format
  194.         
  195.         i = 0;
  196.         glInfo1.aglAttributes [i++] = AGL_RGBA;
  197.         glInfo1.aglAttributes [i++] = AGL_DOUBLEBUFFER;
  198.         glInfo1.aglAttributes [i++] = AGL_ACCELERATED;
  199.         glInfo1.aglAttributes [i++] = AGL_DEPTH_SIZE;
  200.         glInfo1.aglAttributes [i++] = 16;
  201.         glInfo1.aglAttributes [i++] = AGL_NONE;
  202.         gpWindow1 = (WindowPtr) NewCWindow (NULL, &rectWin1, "\pWindow 1", true, kWindowPlainDialogProc, (WindowPtr)-1, 0, 0);
  203.         BuildGLFromWindow ((CGrafPtr) gpWindow1, &aglContext1, &glInfo1);
  204.         if (!aglContext1)
  205.         {
  206.             DestroyGLFromWindow (&aglContext1, &glInfo1);
  207.             sprintf (gstrContext1, "No context");            
  208.         }
  209.         else// set mode string
  210.             sprintf (gstrContext1, "%d x %d", gpWindow1->portRect.right - gpWindow1->portRect.left, gpWindow1->portRect.bottom - gpWindow1->portRect.top);            
  211.             
  212.         memset(&glInfo2, 0, sizeof glInfo2);
  213.         glInfo2.fAcceleratedMust = true;     // must renderer be accelerated?
  214.         glInfo2.VRAM = 0 * 1048576;            // minimum VRAM (if not zero this is always required)
  215.         glInfo2.textureRAM = 0 * 1048576;    // minimum texture RAM (if not zero this is always required)
  216.         glInfo2.fDraggable = true;             // desired vertical refresh frquency in Hz (0 = any)
  217.         glInfo2.fmt = 0;                    // output pixel format
  218.         
  219.         i = 0;
  220.         glInfo2.aglAttributes [i++] = AGL_RGBA;
  221.         glInfo2.aglAttributes [i++] = AGL_DOUBLEBUFFER;
  222. //        glInfo2.aglAttributes [i++] = AGL_ACCELERATED; // can't use this for dragable windows
  223.         glInfo2.aglAttributes [i++] = AGL_DEPTH_SIZE;
  224.         glInfo2.aglAttributes [i++] = 16;
  225.         glInfo2.aglAttributes [i++] = AGL_NONE;
  226.         gpWindow2 = (WindowPtr) NewCWindow (NULL, &rectWin2, "\pWindow 2", true, kWindowFloatGrowProc, (WindowPtr)-1, 0, 0);
  227.         BuildGLFromWindow ((CGrafPtr) gpWindow2, &aglContext2, &glInfo2);
  228.         if (!aglContext2)
  229.         {
  230.             DestroyGLFromWindow (&aglContext2, &glInfo2);
  231.             sprintf (gstrContext2, "No context");            
  232.         }
  233.         else// set mode string
  234.             sprintf (gstrContext2, "%d x %d", gpWindow2->portRect.right - gpWindow2->portRect.left, gpWindow2->portRect.bottom - gpWindow2->portRect.top);            
  235.     }
  236.         
  237.     GetFNum("\pMonaco", &fNum);                                    // build font
  238.     if (aglContext1)
  239.         gFontList1 = BuildFontGL (aglContext1, fNum, normal, 9);
  240.     GetFNum("\pGeneva", &fNum);                                    // build font
  241.     if (aglContext2)
  242.         gFontList2 = BuildFontGL (aglContext2, fNum, italic, 9);
  243.     return true;
  244. }
  245.  
  246. // --------------------------------------------------------------------------
  247.  
  248. void DoMenu (SInt32 menuResult)
  249. {
  250.     SInt16 theMenu;
  251.     SInt16 theItem;
  252.     Str255 daName;
  253.     MenuRef theMenuHandle;
  254.         
  255.     theMenu = HiWord(menuResult);
  256.     theItem = LoWord(menuResult);
  257.     theMenuHandle = GetMenuHandle(theMenu);
  258.  
  259.     switch (theMenu)
  260.     {
  261.         case kMenuApple:
  262.             switch (theItem)
  263.             {
  264.                 case kAppleAbout:
  265.                     break;
  266.                 default:
  267.                     GetMenuItemText (theMenuHandle, theItem, daName);
  268.                     OpenDeskAcc(daName);
  269.                     break;
  270.             }
  271.             break;
  272.         case kMenuFile:
  273.             switch (theItem)
  274.             {
  275.                 case kFileQuit:
  276.                     gDone = true;
  277.                     break;
  278.             }
  279.             break;
  280.     }
  281.     HiliteMenu(0);
  282.     DrawMenuBar();
  283. }
  284.  
  285. // --------------------------------------------------------------------------
  286.  
  287. void DoKey (SInt8 theKey, SInt8 theCode)
  288. {
  289.     #pragma unused (theCode, theKey)
  290.     // do nothing
  291. }
  292.  
  293. // --------------------------------------------------------------------------
  294.  
  295. void DoUpdate (WindowPtr pWindow)
  296. {
  297.     if ((pWindow == gpWindow1) && aglContext1)
  298.     {
  299.         ResumeGL ((CGrafPtr) gpWindow1, aglContext1);
  300.         drawGL (gpWindow1, aglContext1, gFontList1);
  301.     }
  302.     if ((pWindow == gpWindow2) && aglContext2)
  303.     {
  304.         ResumeGL ((CGrafPtr) gpWindow2, aglContext2);
  305.         drawGL (gpWindow1, aglContext2, gFontList2);
  306.     }
  307. }
  308.  
  309. // --------------------------------------------------------------------------
  310.  
  311. void DoEvent (void)
  312. {
  313.     EventRecord theEvent;
  314.     Rect rectGrow;
  315.     SInt32 menuResult;
  316.     WindowRef whichWindow;
  317.     GrafPtr pGrafSave;
  318.     long grow;
  319.     SInt16 whatPart;
  320.     SInt8 theKey;
  321.     SInt8 theCode;
  322.     Boolean fProcessed = false;
  323.     
  324.     if (WaitNextEvent(everyEvent, &theEvent, gSleepTime, NULL))
  325.     {
  326.         {
  327.             switch (theEvent.what)
  328.             {
  329.                 case mouseDown:
  330.                     whatPart = FindWindow(theEvent.where, &whichWindow);
  331.                     SelectWindow (whichWindow);
  332.                     switch (whatPart)
  333.                     {
  334.                         case inGoAway:
  335.                             break;
  336.                         case inMenuBar:
  337.                             DrawMenuBar();
  338.                             menuResult = MenuSelect(theEvent.where);
  339.                             if (HiWord(menuResult) != 0)
  340.                                 DoMenu(menuResult);
  341.                             break;
  342.                         case inDrag:
  343.                             if (gpWindow2 == whichWindow)
  344.                                 DragWindow (whichWindow, theEvent.where, &(**LMGetGrayRgn()).rgnBBox);
  345.                                 // must reset the drawable just incase we moved renderers
  346.                                 aglSetDrawable(aglContext2, (CGrafPtr) NULL);
  347.                                 aglSetDrawable(aglContext2, (CGrafPtr) gpWindow2);
  348.                             break;
  349.                         case inGrow:
  350.                             SetRect (&rectGrow, 100, 100, 20000, 20000);
  351.                             grow = GrowWindow (whichWindow, theEvent.where, &rectGrow);
  352.                             if (grow)
  353.                             {
  354.                                 SizeWindow (whichWindow, grow & 0x0000FFFF, grow >> 16, true);
  355.                                 // do content stuff here
  356.                                 SetPort (whichWindow);
  357.                                 InvalRect (&whichWindow->portRect);                // redraw all
  358.                                 if ((whichWindow == gpWindow2) && aglContext2)
  359.                                 {
  360.                                     aglSetDrawable(aglContext2, (CGrafPtr) NULL);
  361.                                     aglSetDrawable(aglContext2, (CGrafPtr) gpWindow2);
  362.                                     sprintf (gstrContext2, "%d x %d", gpWindow2->portRect.right - gpWindow2->portRect.left, gpWindow2->portRect.bottom - gpWindow2->portRect.top);            
  363.                                 }
  364.                                 if ((whichWindow == gpWindow1) && aglContext1)
  365.                                 {
  366.                                     aglSetDrawable(aglContext1, (CGrafPtr) NULL);
  367.                                     aglSetDrawable(aglContext1, (CGrafPtr) gpWindow1);
  368.                                     sprintf (gstrContext1, "%d x %d", gpWindow1->portRect.right - gpWindow1->portRect.left, gpWindow1->portRect.bottom - gpWindow1->portRect.top);            
  369.                                 }
  370.                                 
  371.                             }
  372.                             break;
  373.                         case inSysWindow:
  374.                             SystemClick(&theEvent, whichWindow);
  375.                             break;
  376.                     }
  377.                     break;
  378.                 case keyDown:
  379.                 case autoKey:
  380.                     theKey = theEvent.message & charCodeMask;
  381.                     theCode = (theEvent.message & keyCodeMask) >> 8;
  382.                     if ((theEvent.modifiers & cmdKey) != 0)
  383.                     {
  384.                         menuResult = MenuKey(theKey);
  385.                         if (HiWord(menuResult) != 0)
  386.                             DoMenu (menuResult);
  387.                     }
  388.                     else
  389.                         DoKey (theKey, theCode);
  390.                     break;
  391.                 case updateEvt:
  392.                     whichWindow = (WindowRef) theEvent.message;
  393.                     GetPort (&pGrafSave);
  394.                     SetPort ((GrafPtr) whichWindow);
  395.                     BeginUpdate(whichWindow);
  396.                     DoUpdate(whichWindow);
  397.                     SetPort ((GrafPtr) whichWindow);
  398.                     EndUpdate(whichWindow);
  399.                     SetPort (pGrafSave);
  400.                     break;
  401.                 case diskEvt:
  402.                     break;
  403.                 case osEvt:
  404.                     if (theEvent.message & 0x01000000)        //    Suspend/resume event
  405.                     {
  406.                         if (theEvent.message & 0x00000001)    //    Resume
  407.                         {
  408.                             
  409.                             gSleepTime = kForegroundSleep;
  410.                             if (gpWindow1 && aglContext1)
  411.                                 DoUpdate (gpWindow1);
  412.                             if (gpWindow2 && aglContext2)
  413.                                 DoUpdate (gpWindow2);
  414.                             gfFrontProcess = true;
  415.                         }
  416.                         else
  417.                         {
  418.                             gSleepTime = kBackgroundSleep;    //    Suspend
  419.                             gfFrontProcess = false;
  420.                         }
  421.                     }
  422.                     break;
  423.  
  424.                 case kHighLevelEvent:
  425.                     AEProcessAppleEvent(&theEvent);
  426.                     break;
  427.             }
  428.         }
  429.     }
  430.     else
  431.     {
  432.         DoUpdate (gpWindow1);
  433.         DoUpdate (gpWindow2);
  434.     }
  435. }
  436.  
  437. // --------------------------------------------------------------------------
  438.  
  439. void CleanUp (void)
  440. {
  441.     MenuHandle hMenu;
  442.  
  443.     DeleteFontGL (gFontList1);
  444.     DeleteFontGL (gFontList2);
  445.     DestroyGLFromWindow (&aglContext1, &glInfo1);
  446.     DestroyGLFromWindow (&aglContext2, &glInfo2);
  447.  
  448.     if (gpWindow1)
  449.     {
  450.         DisposeWindow ((WindowPtr)gpWindow1);
  451.         gpWindow1 = NULL;
  452.     }
  453.     if (gpWindow2)
  454.     {
  455.         DisposeWindow ((WindowPtr)gpWindow2);
  456.         gpWindow2 = NULL;
  457.     }
  458.  
  459.     hMenu = GetMenuHandle (kMenuFile);
  460.     DeleteMenu (kMenuFile);
  461.     DisposeMenu (hMenu);
  462.  
  463.     hMenu = GetMenuHandle (kMenuApple);
  464.     DeleteMenu (kMenuApple);
  465.     DisposeMenu (hMenu);
  466. }
  467.  
  468. // --------------------------------------------------------------------------
  469.  
  470. int main (void)
  471. {
  472.     if (SetUp ())    
  473.         while (!gDone) 
  474.             DoEvent ();
  475.     CleanUp ();
  476.     return 0;
  477. }
  478.  
  479.  
  480. #pragma mark -
  481. //-----------------------------------------------------------------------------------------------------------------------
  482.  
  483. // OpenGL Drawing
  484.  
  485. void drawGL(WindowPtr pWindow, AGLContext aglContext, GLuint fontList)
  486. {
  487.     static float f, s, c;
  488.     GLboolean fState = GL_FALSE;
  489.  
  490.     f += 0.01;
  491.     s = sin(f);
  492.     c = cos(f);
  493.  
  494.     glClearColor(0.15f, 0.15f, 0.15f, 1.0f);                    // Clear color buffer to dark grey
  495.     glClear(GL_COLOR_BUFFER_BIT);
  496.     
  497.     glBegin(GL_POLYGON);                                        // Draw a smooth shaded polygon
  498.     glColor3d(1.0, 0.0, 0.0);
  499.     glVertex3d(s, c, 0.0);
  500.     glColor3d(0.0, 1.0, 0.0);
  501.     glVertex3d(-c, s, 0.0);
  502.     glColor3d(0.0, 0.0, 1.0);
  503.     glVertex3d(-s, -c, 0.0);
  504.     glColor3d(0.7, 0.7, 0.7);
  505.     glVertex3d(c, -s, 0.0);
  506.     glEnd();
  507.  
  508.     // Draw frame rate (set color and position first)
  509.     glColor3d(1.0, 1.0, 1.0);
  510.     glRasterPos3d (-0.95, ((pWindow->portRect.bottom - pWindow->portRect.top) - 40.0) / (float) (pWindow->portRect.bottom - pWindow->portRect.top), 0.0); 
  511.     DrawFrameRate (fontList);
  512.     glRasterPos3d (-0.95, ((pWindow->portRect.bottom - pWindow->portRect.top) - 65.0) / (float) (pWindow->portRect.bottom - pWindow->portRect.top), 0.0); 
  513.     if (aglContext == aglContext1)
  514.         DrawCStringGL (gstrContext1, fontList);
  515.     else
  516.         DrawCStringGL (gstrContext2, fontList);
  517.     
  518.  
  519.     glRasterPos3d (-0.95, -((pWindow->portRect.bottom - pWindow->portRect.top) - 45.0) / (float) (pWindow->portRect.bottom - pWindow->portRect.top), 0.0); 
  520.     DrawCStringGL ((char*) glGetString (GL_VENDOR), fontList);
  521.     glRasterPos3d (-0.95, -((pWindow->portRect.bottom - pWindow->portRect.top) - 20.0) / (float) (pWindow->portRect.bottom - pWindow->portRect.top), 0.0); 
  522.     DrawCStringGL ((char*) glGetString (GL_RENDERER), fontList);
  523.  
  524.     aglSwapBuffers(aglContext);                                        // send swap command
  525. }
  526.  
  527. //-----------------------------------------------------------------------------------------------------------------------
  528.  
  529. // Draw frame rate in curent color at current raster positon with provided font display list
  530.  
  531. void DrawFrameRate (GLuint fontList)
  532. {    
  533.     static char aChar[256] = "";
  534.     static AbsoluteTime time = {0,0};
  535.     static long frames = 0;
  536.  
  537.     AbsoluteTime currTime = UpTime ();
  538.     float deltaTime = (float) AbsoluteDeltaToDuration (currTime, time);
  539.     
  540.     frames++;
  541.  
  542.     if (0 > deltaTime)    // if negative microseconds
  543.         deltaTime /= -1000000.0;
  544.     else                // else milliseconds
  545.         deltaTime /= 1000.0;
  546.     if (0.5 <= deltaTime)    // has update interval passed
  547.     {
  548.         sprintf (aChar, "Swaps/Sec: %0.1f", frames / deltaTime);
  549.         time = currTime;    // reset for next time interval
  550.         frames = 0;
  551.     }
  552.     
  553.     DrawCStringGL (aChar, fontList);
  554. }
  555.  
  556. #pragma mark -
  557. //-----------------------------------------------------------------------------------------------------------------------
  558.  
  559. void DrawPStringGL (Str255 pstrOut, GLuint fontList)
  560. {
  561.     GLint i;
  562.     for (i = 1; i <= pstrOut[0]; i++)
  563.         glCallList (fontList + pstrOut[i]);
  564. }
  565.  
  566. //-----------------------------------------------------------------------------------------------------------------------
  567.  
  568. void DrawCStringGL (char * cstrOut, GLuint fontList)
  569. {
  570.     GLint i = 0;
  571.     while (cstrOut [i])
  572.         glCallList (fontList + cstrOut[i++]);
  573. }
  574.  
  575. //-----------------------------------------------------------------------------------------------------------------------
  576.  
  577. GLuint BuildFontGL (AGLContext ctx, GLint fontID, Style face, GLint size)
  578. {
  579.     GLuint listBase = glGenLists (256);
  580.     if (aglUseFont (ctx, fontID , face, size, 0, 256, (long) listBase))
  581.     {
  582.         glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
  583.         return listBase;
  584.     }
  585.     else
  586.     {
  587.         glPixelStorei(GL_UNPACK_ROW_LENGTH, 0);
  588.         glDeleteLists (listBase, 256);
  589.         return 0;
  590.     }
  591. }
  592.  
  593. //-----------------------------------------------------------------------------------------------------------------------
  594.  
  595. void DeleteFontGL (GLuint fontList)
  596. {
  597.     if (fontList)
  598.         glDeleteLists (fontList, 256);
  599. }